
#-------------------------------------------------------------------------------
#--
#-- Module      :  OptionsReader
#-- Copyright   :  (c) Lakshmi Narasimhan T V
#-- License     :  GNU GPLv3
#--
#-- Maintainer  :  <lakshminaras2002 at gmail dot com>
#-- Stability   :  provisional
#-- Portability :  portable
#--
#--
#--
#---------------------------------------------------------------------------------
use strict;
use warnings;

BEGIN
{
my $TEMP_DIR = File::Basename::dirname($0);
my $PROG_DIR = abs_path($TEMP_DIR);
push @INC,$PROG_DIR;
}          

use Utils;

#REGEXs
my $packagedirREGEX = "packagedir=";
my $appdir = "~/.package-rebuilder";
my $optionsfile = $appdir."/options";
my $packagedir = '';
# Other options

sub get_packagedir()
{
  my $packagedir = `grep $packagedirREGEX $optionsfile`;
  $packagedir = stripws($packagedir);
  
  $packagedir =~ s/$packagedirREGEX//g;
  return $packagedir;
}

1;
